home *** CD-ROM | disk | FTP | other *** search
/ Science Fair / Science Fair.iso / pc / working / sort.dir / 00165.ls < prev    next >
Encoding:
Text File  |  1995-03-27  |  470 b   |  10 lines
  1. on exitFrame
  2.   global gPosX, gPosY, gSizeX, gSizeY, gStartMove
  3.   repeat with n = 1 to 8
  4.     set the locV of sprite (n + 30) to ((the frame - gStartMove) * getAt(gPosX, n) / 6) + 100
  5.     set the locH of sprite (n + 30) to ((the frame - gStartMove) * getAt(gPosY, n) / 6) + 110
  6.     set the width of sprite (n + 30) to (the frame - gStartMove) * getAt(gSizeX, n) / 7
  7.     set the height of sprite (n + 30) to (the frame - gStartMove) * getAt(gSizeY, n) / 7
  8.   end repeat
  9. end
  10.